home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / gfx / board / pnmview_grf.lha / pnmview_grf / Install < prev    next >
Text File  |  1999-01-05  |  4KB  |  159 lines
  1. ;
  2. ; Skript zur Installation von pnmview_grf 1.19
  3. ; Version 1.01, 05.01.99
  4. ; Version 1.00, 22.04.98
  5. ; (c) 1998/99 Stefan Diener
  6. ;
  7.  
  8. (set @pretend 0)
  9. (set @user-level 2)
  10. (set @default-dest "")
  11.  
  12. (complete 0)
  13.  
  14. (if (= @language "deutsch")
  15.  (
  16.    ; deutsche Textausgaben
  17.    (set #yes "Ja")
  18.    (set #no "Nein")
  19.    (set #gruss "\n\n\n\npnmview_grf 1.19\n© 1997/99 by Stefan Diener\n\n\nWillkommen zur Installation von pnmview_grf 1.19 !\nDieses Skript wird pnmview_grf auf Ihrer Festplatte installieren.\n")
  20.    (set #destimsg "Wo wollen Sie pnmview_grf installieren ?\n(Ein Verzeichnis namens STIMP wird dort automatisch erzeugt.)")
  21.    (set #addlines "\nZwei Zeilen müssen zur Datei S:User-Startup hinzugefügt werden:\n")
  22.    (set #fertig "\n\npnmview_grf ist nun auf Ihrer Festplatte in folgendem\nVerzeichnis installiert:\n")
  23.    (set #whichcpu "\n\n\nDiese Shareware-Version enthält nur eine\nunoptimierte 68000er Version.\n\nOptimierte Versionen sind für registrierte Benutzer verfügbar.")
  24.    (set #ultraconv "\nUltraconv V3/V4-Unterstützung:\n\nErgänzen Sie in der Datei 'UConv:Ultraconv.info'\nfolgende Zeile, um pnmview_grf als voreingestellten\nAnzeiger für Previews zu verwenden:\n\nPREVVIEWER=STIMP:bin/pnmview -2 %f\n\n(Alle anderen Zeilen, die den Tooltype PREVVIEWER\nenthalten, müssen eingeklammert werden !!!)")
  25.    (set #library "\npnmview_grf benötigt die graffiti.library ...\n")
  26.  )
  27.  (
  28.    ; english text output
  29.    (set #yes "Yes")
  30.    (set #no "No")
  31.    (set #gruss "\n\n\n\npnmview_grf 1.19\n© 1997/99 by Stefan Diener\n\n\nWelcome to the pnmview_grf 1.19 installation !\nThis script will install pnmview_grf on your harddisk.\n")
  32.    (set #destimsg "Where do you want to install pnmview_grf ?\n(A directory called STIMP will be automaticly created.)")
  33.    (set #addlines "\nTwo lines have to be added to your S:User-Startup:\n")
  34.    (set #fertig "\n\npnmview_grf is now installed on your harddisk at:\n")
  35.    (set #whichcpu "\n\n\nThis shareware version contains an unoptimized\nexecuteable for 68000 only.\n\nOptimized versions are available for registered users.")
  36.    (set #ultraconv "\nUltraconv V3/V4 support:\n\nAdd the following line to the file 'UConv:Ultraconv.info'\nto install pnmview_grf as default preview program:\n\nPREVVIEWER=STIMP:bin/pnmview -2 %f\n\n(All other lines including the tooltype PREVVIEWER\nhave to be in clauses !!!)")
  37.    (set #library "\npnmview_grf needs the graffiti.library ...\n")
  38.  )
  39. )
  40.  
  41. ; kleine Begruessung
  42. (message #gruss
  43. )
  44.  
  45. ; Zielpfad ermitteln
  46. (set #destidir
  47.   (askdir
  48.     (prompt #destimsg)
  49.     (help @askdir-help)
  50.     (default "GFX:")
  51.   )
  52. )
  53.  
  54. (complete 15)
  55.  
  56. (set #dstdir
  57.   (tackon #destidir "STIMP")
  58. )
  59.  
  60. ; ggf. Verzeichnis fuer STIMP erst erzeugen
  61. (if (= (exists #dstdir) 0)
  62.  (makedir #dstdir)
  63. )
  64.  
  65. (complete 25)
  66.  
  67. ; alle Pfade definieren
  68. (set #binpath
  69.   (tackon #dstdir "bin")
  70. )
  71.  
  72. (set #docpath
  73.   (tackon #dstdir "doc")
  74. )
  75.  
  76. (set #helppath
  77.   (tackon #dstdir "help")
  78. )
  79.  
  80. ; leider nur 68000er Variante verfuegbar
  81. (message #whichcpu
  82. )
  83.  
  84. (complete 30)
  85.  
  86. ; Dokumentation kopieren
  87. (copyfiles
  88.   (source "doc")
  89.   (dest #docpath)
  90.   (pattern "#?")
  91. )
  92.  
  93. (complete 45)
  94.  
  95. ; Help-Dateien kopieren
  96. (copyfiles
  97.   (source "help")
  98.   (dest #helppath)
  99.   (pattern "#?")
  100. )
  101.  
  102. (complete 60)
  103.  
  104. ; Programm selbst kopieren
  105. ; nur 68000
  106. (copyfiles
  107.   (source "bin")
  108.   (dest #binpath)
  109.   (pattern "#?")
  110. )
  111.  
  112. (complete 70)
  113.  
  114. (set #linetoadd1
  115.   (cat "Assign STIMP: " #dstdir)
  116. )
  117.  
  118. (set #linetoadd2 "Assign C: STIMP:bin add")
  119.  
  120. ; Assign-Zeilen in S:User-Startup einfuegen
  121. (startup "STIMP"
  122.   (prompt #addlines
  123.           #linetoadd1 "\n"
  124.           #linetoadd2)
  125.   (help "These lines have to be added in order to make the STIMP programs run properly !")
  126.   (command #linetoadd1 "\n" #linetoadd2)
  127. )
  128.  
  129. ; auch jetzt schon Assign wirksam werden lassen
  130. (makeassign "STIMP" #dstdir)
  131.  
  132. ; Hier muesste stehen: "Assign C: STIMP:bin add".
  133. ; Stattdessen wird ein kleines Shell-Skript
  134. ; aufgerufen -> umstaendlich, aber noetig ...
  135. (execute "Assign.Skript")
  136.  
  137. (complete 80)
  138.  
  139. ; graffiti.library kopieren
  140. (copylib
  141.   (prompt #library)
  142.   (help "This library is REALLY needed for pnmview_grf !!!")
  143.   (source "libs/graffiti.library")
  144.   (dest "LIBS:")
  145.   (confirm)
  146. )
  147.  
  148. (complete 95)
  149.  
  150. ; Hinweis zu Ultraconv V3/V4
  151. (message #ultraconv
  152. )
  153.  
  154. (complete 100)
  155.  
  156. ; das war es schon -> Verabschiedung
  157. (message #fertig #dstdir "\n\n\nHave fun !"
  158. )
  159.